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INTRODUCTION 


This  report  contains  a detailed  description  of  a computer  program 
that  was  developed  for  use  with  the  Interdata  7/32  computer  and  the 
interfaced  Nike  Hercules  radar  systems  located  at  the  MTTR  site  at 
White  Sands,  New  Mexico  and  the  Poker  Flat  site  in  Alaska. 

The  program  contains  both  assembler  and  FORTRAN  language  in- 
structions. The  assembler  language  instructions  are  used  to  provide 
input/output  control  for  data  flow  from  the  radar  to  the  computer 
and  from  the  computer  to  the  T.V.  aisplay.  The  FORTRAN  statements 
comprise  95%  of  the  program  and  are  used  to  compute  most  of  the 
processed  data. 

The  program  can  process  in  real-time  a complete  data  reduction 
for  an  MRN  rocketsonde  or  a list  of  2 minute  layer  winds  for  a 
radiosonde.  For  a rocketsonde,  the  program  utilizes  the  temperature 
telemetry  data,  the  positional  radar  data,  and  the  operator  inputs 
of  rocketsonde  temperature  calibration  values  and  base  level  tie-in 
data  from  a radiosonde  flight  to  produce  an  MRN(WDC-A)  format  listing 
of  the  following: 

1.  1 KM  corrected  and  uncorrected  winds 

2.  Significant  level  temperature  data 

3.  1 KM  thermodynamic  data 

4.  Significant  level  thermodynamic  data 

5.  MRN  30  cards (image) 

6.  Mandatory  thermodynamic  data 

7.  MRN  40  cards (image) 

8.  Printer  plot  of  X and  Y component  winds  and 

temperatures  versus  1 KM  altitudes 


For  a radiosonde,  che  program  utilizes  the  positional  radar  data 
to  produce  a listing  of  two-mlnute  layer  winds  at  1 minute  Intervals. 

This  report  Includes  a description,  listing  and  flow  charts  for 
the  main  program  and  all  subroutines,  together  with  instructions 
and  examples  on  how  to  use  the  program.  Also  Included  is  the  typical 
output  listing  for  both  the  radiosonde  and  rocketsonde  flights. 
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I.  DKSCRirTUlN  OF  l‘RO'JR/\MS 


Ma^ii  Program 

Besides  performing  calls  to  the  subroutine,  the  main  program  performs  many 
other  functions.  At  the  start  of  execution  the  main  program  obtains  necessary 
information  from  the  operator: 

1)  what  mode  the  program  is  to  run  in;  real-time,  calculation  with  cape, 
or  copy; 

2)  whether  a real  time  flight  might  be  a rocket  or  a balloon; 

3)  for  a real-time  flight  information  such  as  name,  time  of  launch,  and 
date;  and 

4)  if  calibration  data  is  available. 

The  main  program  contains  an  area  of  variables,  found  in  the  COMMON  area 
BUFOTA,  that  is  used  as  a storage  buffer.  The  entire  buffer  is  written  in  a 
write  to  magnetic  tape  on  a real-time  run,  or  read  from  mag  tape  on  a cal  with 
tape  or  copy  run. 

The  main  program  contains  the  routine  which,  for  a real-time  run,  services 
an  interrupt  from  the  ranger.  This  routine,  starting  at  label  INTRP,  reads  the 
data  lines  to  obtain  current,  raw  data  values  for  elevation,  azimutli,  and  slant 
range  for  the  radar  and  to  get  tlie  time  and  telemetry  (met)  values.  The  mot 
values  are  run  through  a selective  filter  to  determine  bad,  or  noise,  values, 
and  determine  changes  or  modulations  in  the  met  signal.  For  more  detail  on 
the  met  filter  refer  to  the  flow  chart  for  tlie  main  program.  Starting  at  the 
label  DISPINT  Is  the  routine  which  services  an  interrupt  from  the  TV  display. 
This  routine  takes  the  latest  raw  data  values  and  writes  the  data  out  to  the 
display  memory  to  be  displayed  on  the  next  sweep  of  the  TV. 
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The  label  KDl'AI’K  boRins  an  area  of  the  main  program  which  manipulates  the 
raw  data  stored  in  tlie  buffer.  Eievation,  azimuth,  and  range  values  are  converted 
to  a special  integer  format  to  be  used  by  tlie  digital  smoothing  filter  in  the 
subroutine  WNDCAI..  Time,  whicli  in  raw  data  form  lias  to  be  stored  as  three 
separate  words,  is  converted  to  time,  in  seconds,  after  launch. 

In  the  copy  mode  no  subroutines  are  called,  and  the  program  merely  reads 
a record  from  the  mag  tape  and  prints  all  levels  of  data  in  that  record,  reads 
another  record,  and  so  on  until  an  end  of  file  is  encountered  on  the  mag  tape. 

For  real-time  and  call  with  tape  modes,  the  heart  of  the  main  processing  routine 
starts  at  the  FORTRAN  lable  230  in  the  main  program.  The  routine  consists 
basically  of  shifting  raw  data  values  of  elevation,  azimuth,  range,  and  time  in 
and  out  of  a 121-point  data  storage  array  labelled  RAW.  The  subroutine  WNDCAL 
is  then  called  to  filter  the  raw  data,  compute  and  correct  winds,  and  to  print 
layer  data  on  the  line  printer.  In  the  cal  with  tape  mode,  new  raw  data  values 
are  read  from  the  mag  tape  until  an  end  of  file  is  encountered.  For  the  real 
time  mode,  as  previously  mentioned,  new  raw  data  values  are  obtained  in  the  range 
interrupt  service  routine;  continuing  until  an  end  of  flight  signal  is  entered 
by  the  operator. 

Subrouti ne  WNDCAL 

The  subroutine  WNDCAL  is  called  by  the  main  program  in  both  real-time  and 
calculation  with  tape  modes,  and  for  both  rocket  and  balloon  flights.  The  main 
purposes  of  the  subroutine  are:  to  smooth  raw  data  values  by  using  a 117-polnt, 
symmetrical,  low-pass  digital  filter;  to  calculate  positional  data  and  to 
compute  wind  velocities;  to  apply  wind  correction  methods  to  the  wind  velocities 
for  rocket  flights;  and  to  print  layer  data  on  the  line  printer  at  the  proper 
time  or  altitude  during  the  flight. 

The  raw  data  values  are  sent  to  WNDCAL  in  the  array  IRAW,  which  is  found  in 
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COMMON  area  BLOCKl.  BLOCKl  also  contains  parameters  which  are  control  variables 
and  are  set  in  the  main  program. 

The  subroutine  WNDCAL  stores  computed  and  corrected  layer  data  in  a storage 
area  in  the  main  buffer,  which  is  the  COMMON  area  BUFDTA.  The  storage  area  starts 
at  the  variable  named  RTT  and  extends  through  the  variable  named  RVS.  This  is 
the  data  that  will  be  available  to  the  program  in  the  copy  mode. 

For  rocket  flights  WNDCAL  also  stores  the  computed  layer  data  in  anotlier 
area  - COMMON  area  B1.0CK2 . The  data  saved  consists  of  wind  speed  and  direction, 
fall  velocity,  altitude,  and  time  lor  each  even  kilometer  layer  during  the 
descent  of  the  rocketsonde.  This  data  is  later  used  in  the  temperature  processing 
subroutine  TEMCOR. 

Subroutine  SIGLEV  (IlSIG,  D55) 

The  subroutine  SIGLEV  is  called  only  by  the  main  program  and  only  for  rocket 
flights  with  temperature  processing.  The  main  purpose  of  SIGLEV  is  to  detect, 
by  the  use  of  a selective  filter,  all  significant  changes  in  the  met  data  during 
the  descent  of  the  rocketsonde.  Time  and  temperature  are  saved  for  eacli  change 
detected,  and  these  points  are  marked  as  significant  levels. 

The  subroutine  SIGLEV  performs  different  Jobs  depending  on  which  of  the  three 
•nodes  it  is  called.  The  passing  parameter  IlSlG  determines  what  the  mode  will  be, 
and  is  Set  by  t'ae  calling  program.  The  three  modes  of  calls  are:  initialize  and 
set  up  the  routine  tlie  first  time  it  is  called;  a normal  temperature  processing 
call;  and  the  last  call  to  print  out  all  saved  significant  levels. 

For  normal  temperature  processing  SIGLEV  is  called  everytime  the  main 
program's  met  filter  passes  a "good"  data  point.  The  met  ordinate  value  and  its 
corresponding  time  are  sent  to  SIGLEV  via  user  registers  6 and  7.  SIGLEV  first 
determines  whether  the  value  is  a regular  temperature  value  or  a reference.  All 
references  and  the  time  they  occur  are  saved,  and  all  temperatures  (and  their  times) 
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that  are  dist insu ished  as  significant  levels  are  also  saved.  The  significant 
level  temperatures  and  times  are  stored  in  the  COMMON  area  LKTMTP,  so  that  they 
may  be  "sed  later  by  the  temperature  correction  subroutine  TEMCOR.  SIGLEV 
has  to  make  a call  to  subroutine  LOKTEM  to  determine  the  actual  uncorrected 
temperature  value  in  degrees.  SIC^LEV  sends  a ratio  of  the  temperature  ordinate 
to  its  reference  ordinate  to  LOKTEM,  which  returns  the  temperature  in  degrees. 
LOKTEM  contains  the  calibration  values  for  the  particular  rocketsonde  instrument. 
For  more  detail  on  .SIGLEV's  selective  filter  refer  to  the  flowchart. 

On  the  last  call  to  SIGLEV,  the  routine  prints  out  the  entire  stored  list 
of  significant  level  temperatures  and  their  corresponding  times,  and  the  complete 
list  of  references  and  times. 

Subrou  t ine  LOKTEM ( I CAL , CR/XTIO) 

The  subroutine  LOKTEM  has  two  primary  functions  and  is  called  only  for 
rocketsonde  flights.  For  its  first  function,  LOKTEM  is  called  by  the  main 
program  to  determine  whether  temperature  processing  will  be  done  or  not. 

If  temperature  processing  is  to  be  done,  and  the  program  is  running  in  the 
real-time  mode,  then  calibration  values  for  this  particular  rocketsonde 
instrument  must  be  read  in  from  a paper  tape.  If  the  program  is  in  the  cal 
with  tape  mode,  then  LOKTE.M  checks  to  see  if  the  calibration  data  was  saved 
on  the  mag  tape;  if  not,  LOKTEM  asks  the  operator  to  input  a paper  tape.  In 
either  mode,  if  a paper  tape  is  input,  the  operator  is  asked  to  make  a simple 
check  for  verltication  of  the  data. 

Norn.al  temperature  processing  is  the  second  function  the  subroutine  performs. 
This  occurs  when  LOKTEM  is  called  by  the  subroutine  SIGLEV.  LOKTEM  is  passed 
a value,  CRjVTlO,  which  is  a ratio  of  a temperature  ordinate  to  its  reference 
ordinate.  LOKTEM  looks  into  its  table  of  stored  ratios  and  interpolates  to 
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obtain  a temperature  value  in  degrees,  which  is  then  returned  to  SIGLEV  via 


the  variable  CfbVTIO. 

ICAL  is  the  name  of  the  parameter  that  signals  LOKTEM  which  function  it 
is  to  perform.  The  variable  that  determines  whether  tlie  program  is  in  real- 
time or  cal  with  tape  mode  is  JC,  which  is  in  COMMON  area  Bl.OCKl. 

When  the  program  is  running  in  real-time  and  a calibration  tape  is  read 
in,  all  calibration  data  is  saved  by  storing  it  in  the  main  buffer,  COMMON 
area  BUFDTA,  which  is  written  on  the  first  niijg  tape  record.  '.npropriate 
flags  are  set,  also  in  the  buffer,  to  flag  that  the  d.iCa  is  there.  LOKTEM 
may  then  determine  if  the  calibration  data  was  saved  so  that  it  can  read 
the  data  from  the  buffer  in  the  first  mag  cape  record.  For  either  mode, 
if  no  cal  uat.i  is  available,  LOKTEM  sets  the  parameter  ICAL  to  a value 
to  signal  the  main  program  that  no  cal  data  is  available  and  that  no  temperature 
processing  can  be  done. 

Subrout ine  TEMCOR  (NOUK,  BLALT,  BLl’R,  BLTMT) 

The  subroutine  TEMCOR  is  called  only  once  during  a flight,  by  the  main 
program,  and  is  called  only  for  rocketsonde  flights  where  temperature  processing 
is  to  be  done.  The  routine  is  called  in  both  real-time  and  cal  with  tape 
modes.  The  main  purposes  of  TEMCOR  are:  to  take  temperatures  computed  during 
the  flight  and  apply  the  suandard  IRIG  correction  method  to  obtain  corrected 
temperatures;  to  compute  pressures  and  densities,  if  an  acceptable  base  level 
matchup  can  be  made  with  a conjunctive  raw  insonde  observation. 

TEMCOR  is  sent  input  data  in  two  COMMON  areas  - BL0CK2  and  LKTMTP.  The 
first  area  contains  the  wind  data  which  was  stored  by  the  subroutine  WNDCAL 
at  each  even  kilometer  level.  COMMON  area  LKl’MTP  contains  all  significant 
level  temperatures  and  times,  whicli  were  stored  by  the  subroutine  SIGLEV. 

TEMCOR  obtains  a temperature  for  each  kilometer  through  interpolation,  bv 
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timo,  into  cho  .sii;ni  f u-ant  ci-mperature  array;  aiul  finally  a correction  term 
is  calculated  which  is  added  to  the  uncorrected  temperature. 

For  the  base  'evel  tie  in,  data  must  be  input  by  tlie  oper.itor.  Hl.Ai.T,  Bl.f’K, 
and  are  tiie  input  variables  wliich  are,  respectively,  base  level  altitude, 

o'-essi.re,  and  temperature.  There  are  two  criteria  which  determine  wlietitcr 
particvilar  base  level  data  is  >;ood  or  not.  First,  it  must  be  at  an  altitude 
t cached  durin.c  the  descent  of  the  rockelsonde  wliile  it  was  still  transmittins 
"■et  data;  and  second,  the  base  level  temperature  must  asree  within  2.5  degrees 
of  that  measured  bv  the  rocketsonde  at  tlie  same  altitude.  If  a base  level  is 
rejected  the  operator  may  try  another,  and  so  on,  until  eitiier  a raatcluip  is 
found  or  the  operator  signals  to  stop.  In  tlie  case  wliere  no  base  level  is 
found,  obviously  no  pressure  data  can  be  computed,  and  a flag  is  set  to  signal 
the  remainder  of  tlie  program  that  no  pressure  data  is  available.  If  the 
program  is  in  the  real-time  mode  and  a base  level  is  accepted  by  TFMCOK,  tiiis 
data  is  written  into  the  buffer,  COMMON  area  Bl'FDTA,  along  witli  flags,  so  that 
the  base  level  matchup  will  be  saved  on  the  last  buffer  write  to  the  mag 
tape . 

Corrected  temperature,  correction  amount,  pressure,  density,  and  speed 
of  sound  are  all  saved  in  the  remaining  storage  areas  of  COMMON  area  bI,0CK2; 
this  area  then  will  contain  the  complete  set'  of  wind  and  thermodynamic  data 
for  l-KM  levels.  TKMCOR  prints  this  same  set  of  data  for  each  1-lcM  level. 

■Subrout  ino  SI  .ML 

The  subroutine  SLMl.  performs  a number  of  functions;  but  is  only  called 
once;  lo  the  main  program,  and  only  for  rocketsonde  flights  with  temperature 
processing.  The  main  purposes  of  SLMl-  are;  to  compute  and  print  out  thermodynamic 
data  for  significant  and  mandatory  (constant  pressure)  levels;  to  call  subroutine 
MRN  for  each  computed  layer  of  data;  and  to  encode  tne  data  in  the  MFU  format 
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aiiil  print  It  out. 

SLMI.  Is  sent  tlio  complete  array  of  1-KM  level  tliermodynamlc  data  in 
COMMON  area  HI.0('K2.  Tlie  wind  and  positional  data  was  computed  by  subroutine 
WNDCAl,,  and  the  corrected  temperature  and  pressure  data  was  computed  by 
subroutine  TKMCOK.  is  also  sent  tlie  array  of  significant  temperatures 

and  times,  saved  by  subroutine  SICI.KV,  in  tlie  COMMON  area  l.KTMTP. 

First,  SI.MI,  takes  each  significant  level  and  Interpolates  by  time, 
into  the  1-KM  level  array.  Thus,  all  thermodynamic  data  is  obtained  for  each 
altitude  where  a significant  level  temperature  was  detected.  Next  .S1.M1. 

Interleaves,  by  altitudes,  this  significant  level  array  of  data  wltli  the  1-KM 
level  array.  SI.MI.  tlien  calls  subroutine  MRN  to  format  and  print  out  the  data. 

This  comprises  the  MRN  10  cards. 

If  no  base  level  was  given,  mandatory  level  data  cannot  be  computed,  and 
execution  is  returneil  to  the  main  program.  Otherwise  SLMI.  determines  which 
mandatory  (constant  pressure)  levels  fit  between  the  upper  .and  lower  limits 
of  the  1-KM  level  array.  All  thermodyn.imlc  d.ata  is  thi-n  interpolated,  by  prussure, 
for  eacii  mandatory  level.  This  dat.a  is  printed,  and  then  subroutine  MRN  Is 
called  to  form.it  and  print  out  the  data  for  each  level  (making  up  the  40  cards). 

Subroutine  _FIRN(II),  MRNA) 

The  subroutine  MRN  gener.ates  an  MRN-form.itted  mess.age  for  one  level  of 

/ 

thermodyn.amlc  data,  when  called  by  subroutine  SI.MI,.  MRN  Is  c.alled  only  for 
rocketsonde  flights  with  temper.iture  processing,  for  both  real-time  and  cal  with 
tape  modes. 

The  p.ar.imeter  II)  identifies  for  MRN  what  type  of  d.ata  is  to  be  formatted: 

10  cards  are  1-KM  or  significant  levels,  and  40  c.ards  .are  mandatory  (const.ant 
pressure)  levels. 

The  data  is  sent  to  MRN  in  the  passed  array  MRNA.  Kssenti.allv  the  same 
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foniuil  ts  usi’J  t lU"  botii  JO  and  'tO  cards,  with  twn  exceptions.  Kor  the 
AO  cards  (mandatory  levels),  neopotent  la  1 ratlier  than  i;eometric  altitude 
is  used,  and  la  1 1 velocity  is  not  included.  MKN  accepts  tiie  passed  d.ita, 
t'ormats  it,  prints  out  one  lino  (a  card  lmat>e) , and  returns  control  to 
subrout  Ine  SI.Ml.. 

Subrout  Ine  XYl’l.OT 

The  subroutine  .XYl’LOT  is  called  by  the  main  program  for  rocketsonde 
(light  with  temperature  processing.  It  Is  called  for  In'th  real-time 
and  cal  with  tape  modes.  The  main  purpose  of  .XYl’hOT  is  to  construct 
a plot,  on  the  line  printer,  of  the  winds  and  temperature  versus  altitude 
during  the  descent  of  tlie  rocketsonde. 

XYl’l.OT'  is  sent  the  complete  array  of  1-XM  level  wind  and  thermodyn.imic 
dat.i  in  COMMON  area  B1.0CK2.  for  eacli  1-KM  altitude  the  routine  merely 
determimns  the  values  of  tlie  component  winds  and  the  temperature.  XYl’l.OT 
then  prints  out  one  line  giving  the  altitude,  and  marks  In  the  appropriate 
spots  for  the  wlmls  and  temperature. 

An  X stands  for  the  value  of  the  corrected  X-component  wind,  and  .i  Y 
stands  for  the  value  of  the  correited  Y-component  wind.  A 1 stands  for  the 
value  of  the  corrected  temper.iture.  Anytime  two  or  more  of  the  parameti'ts 
occuiiy  the  same  spot  on  the  plot  .'in  0 is  printed. 

••iubri'ut  ine  KtHT'li 

Till'  subtout  ine  ROtlOli  is  c. tiled  bv  the  main  program  lor  a rocketsonde 
flight  with  tem|  oratun  processing,  and  for  both  real-time  and  cal  vcilh 
tape  modes.  It  is  calleil  to  perlor"!  the  task  ol  formul.it  ing.  and  priming 
out  the  KOCOli  message. 
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Koniiu  lai  ion  ot  tlio  ROCOb  mossiit;o  con.slsts  basically  of  running  chocks 
on  Lho  lliroo  paramotors  - wind  spood , wind  direct  ion,  and  corrected  temperature 
to  detect  layers  wliicli  exceed  specified  limits  (flowchart  proveues  details 
on  limits).  These  layers,  plus  those  at  every  even  5KM  througliout  the  I 

I 

flight,  are  included  in  the  message.  Thermodynamic  d.it.i  for  each  included 

layer  is  specially  formatted  and  the  par.imeter  which  exceeded  limits  and  ; 

I 

caused  .1  laver  to  he  selected  is  marked;  this  cimiprises  the  ROdOH  message  | 

I 

printout.  ^ 

Rlltdib  is  sent  the  complete  array  of  1-RM  level  wind  .nul  thermodynamic 
il.ita  in  the  titlMMl'N  area  lU.lKlKi.  Pressure  and  density  are  not  used  .is  ! 

p.ir.imeters  in  m. iking  the  data  checks,  so  a KOCOb  message  is  made  wluther  j 

i 

a base  level  matchup  was  achieved  or  not.  If  it  was,  then  density  data 
is  .ilso  torm.itted  and  included  in  the  message  printout;  I'therwise  dummy 
v.ilues  (“i's)  are  filled  in  for  di'iisitv  in  t lu'  printout. 

A complete  listing  of  .ill  progr.ims  is  cont.iined  in  the  section  l.iheled 
PKiKdUM.S. 


>1 


II.  OI’KRATINC  PROCEDURE 


The  program  was  written  for  operation  on  an  Interdata  model  7/32  mini- 
computer and  to  execute  in  the  Interdata  32-blt  operating  system.  This  system 
requires  that  any  1/0  devices  used  by  a program  be  given  certain  logical 
unit,  or  numerical,  assignments.  After  the  program  has  been  loaded  into 
memory,  and  before  starting  execution,  the  following  logical  unit  assignments 
must  be  made  to  comply  with  those  needed  by  the  program: 

Logical  Unit  - I/O  Device 

1 - Magnetic  tape  drive 

2 - High  speed  paper  tape  reader  and  punch 

3 - Line  printer 

5 - Command  console  (teletype  or  CRT  terminal) 

When  the  start  execution  command  is  entered  by  the  operator,  through  the 
command  console,  the  program  will  always  write  out  the  following  message 
back  to  the  console: 

REAL  TIME  CR  PRINT  COPY  ICR  CAL  WITH  MAG  TAPE  2 CR. 

The  operator's  response  determines  the  running  mode  for  the  program.  A step- 
by-step  procedure  is  given  here  to  explain  available  options  for  each  of  the 
three  modes;  and  following  are  examples  of  each. 

A . REAL  TIME  MODE 

The  program  is  placed  in  the  real  time  mode  by  a CR  (carriage  return) 
in  response  to  the  initial  question  from  the  program.  NOTE:  If  the  operator 
anticipates  running  in  real  time,  then  prior  to  starting  program  execution  a 
mag  tape  should  be  loaded  on  the  tape  drive  and  positioned  to  the  proper  point. 
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Tho  first  viro^ram  action,  in  tiie  real  time  mode.  Is  to  write  this  message 
to  tlie  conmiand  console: 

1 Nl’UT  RN.\MF. ’ RDNM'  DY  ' MN ' YR ’ LN  TM ' 

Tills  Is  a request  to  the  operator  for  the  following  flight  Information: 
round  name  (radiosonde,  etc.),  round  number,  day  of  the  month,  month,  year 
(last  two  digits)  and  launch  time.  Data  is  entered  by  the  operator  cn  the 
next  line,  directly  underneath  the  corresponding  heading  and  between  the 
quote  marks.  The  program  now  writes  this  message  to  the  command  console: 

ROCKET?  1 CR,  SONDE?  CR 

Here  tlie  operator  enters  the  appropriate  answer  - a CR  (carriage  return) 
for  a balloon  flight,  or  a 1 CR  (a  one  followed  by  a carriage  return)  for  a 
rocket  flight. 

1.  Balloon  - real  time  mode 

The  program  will  now  print  a page  heading,  with  the  flight  information, 
on  the  line  printer,  and  then  a line  heading.  Next,  the  following  message 
is  written  to  tho  command  console: 

PRESS  CR  TO  START  DISPlJlY 

Wlien  the  program  receives  a CR  (carriage  return)  from  the  operator, 
this  message  is  written  to  the  command  console: 

PRESS  DTA  2 AT  LAUNCH 

At  tlie  same  time,  the  external  interrupts  from  the  ranger  and  the  T.V. 
display  are  enabled.  Raw  data  is  now  being  read  on  the  data  receiving 
lines,  by  the  program,  and  values  are  encoded  to  be  written  to  the  display; 
no  data  is  yet  being  recorded  on  mag  tape  or  written  on  the  line  printer. 

At  the  moment  of  balloon  lift-off,  the  operator  should  press  the  DTA 
and  2 buttons  on  tho  computer  control  panel.  The  program  then  writes  this 
message  to  the  command  console: 
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PRESS  DTA  3 AT  RADAR  LOCK 

At  the  same  time  the  program  reads  the  time  from  the  cJock  and  writes 
out  the  Zulu  launch  time  on  the  line  printer.  Also,  at  the  same  time,  the  program 
now  starts  recording  data  on  the  mag  tape.  Wind  data  is  not  yet  being  fil- 
tered or  printed  out,  but  raw  positional  data  is  being  stored,  and  met  data 
is  being  filtered  and  stored  in  the  mag  tape  data  buffer. 

When  the  tracking  radar  system  has  confirmed  radar  lock  on  tlie  t ircet . 

the  operator  should  press  the  DTA  and  3 buttons  on  tlie  computer  control  panel . 

The  program  will  then  write  this  message  to  the  command  console: 

PRESS  DTA  8 TO  END  FLIGHT 

At  the  same  time,  the  program  prints  the  time,  in  minutes  and  seconds, 
between  balloon  lift-off  and  radar  lock.  The  program  now  enters  its  fund- 
amental running  cycle.  The  cycle  consists  of  these  basic  steps:  wlien  the 
ranger  generates  an  interrupt,  the  data  lines  are  read  to  accept  new  values 
for  elevation,  azimuth,  range,  and  time;  when  the  data  buffer  fills,  it  is 
written  on  the  mag  tape;  raw  data  values  are  written  to  the  display  memory, 
to  be  displayed  by  the  T.V.;  data  values  are  filtered  and  positional 
and  wind  data  is  computed;  at  every  multiple  of  60  seconds  after  balloon 
lift-off,  wind  and  positional  data  is  written  to  the  line  printer.  This  program 
cycle  will  continue  until  the  operator  enters  a 'DTA 8'  on  tlie  computer 
control  panel.  The  program  will  then  continue  reading  new  data  long  iniougli 
to  fill  the  data  buffer;  then  a last  write  is  issued  to  the  mag  tape, 
program  execution  ends,  and  control  returns  to  the  operating  system.  The 

operator  should  then  issue  a 'write,  filemark'  command  to  the  map  tape. 

will  allow  for  recording  more  than  one  fliglit  on  a tape,  and  keeping  the  flights 

separate. 

2.  Rocket  - real  time  mode 
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Wlien  tlio  opeator  has  indicated  tliat  the  tlight  will  be  a rocket,  tlie 


projtram  will  respond  with  tliis  message  to  the  command  console: 

CAl.  TAl’K  AVAII.ABLK?  YKS  PRKSS  CR,  NO  1 CR 

The  question  really  asked  here  is  if  temperature  processing  is  to  be  done 
to*-  tiiis  fliglit.  If  so,  a paper  tape,  with  calibration  values  for  the 
particular  rocketsonde  instrument  to  be  tracked,  must  be  read  in  by  the 
program.  Instructions  on  making  a calibration  paper  tape  are  given  in  the 
following  section  of  examples. 

2a.  Rocket  - no  temperature  processing 

For  a real-time  rocket  flight,  where  no  calibration  data  is  available, 
and  thus  no  temperature  processing  is  to  be  done,  the  operating  procedure 
is  the  very  same  as  described  in  the  previous  section  (under  heading:  1. 
Balloon  - real  time  mode),  with  a few  minor  exceptions.  First,  the 
operator  should  enter  ' DTA  2'  on  tlie  computer  control  panel  at  rocket  launch 
rather  than  balloon  lift-oif.  The  other  exceptions  are  in  the  program 
cycle  itself.  For  a rocketsonde  track,  wind  data  is  calculated  and  also 
cort '■  ted  using  correction  techniques  for  vertical  acceleration.  Finally, 
instead  of  data  being  printed  on  the  line  printer  at  60  second  intervals 
after  balloon  lift-off,  now  corrected  winds  and  angular  data  are  printed 
out  lot  every  1-K,'1  layer  passed  through  during  the  descent  of  the  rocketsonde. 

2b.  Rocket  - with  temperature  processing 

Ivhen  the  operator  indicates  that  a calibration  tape  is  available  (tape 
must  be  prepared  in  advance),  tT.?  program  will  respond  with  this  message  on 
the  command  console: 

I’UT  lOKI  TKMP  TAl'F  IN  READKR  "RESS  CR 

!'he  operacor  should  then  load  the  cal  tape  in  tl’.e  paper  tape  reader, 
and  then  hit  the  carriage  return  on  the  command  console.  The  tape  will  be 
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read  In,  and  ihe  program  will  construct  a table  of  look-up  values.  The  program 
then  takes  three  different  ratios  and  determines  their  corresponding  values 
In  the  look-up  table.  The  ratios  and  values  are  printed  out  on  the  command 
console,  and  then  this  message: 

CAL  RATIOS  WITHIN  .3  DEG?  PRESS  CR,  NO  PRESS  1 CR 

Here  the  operator  is  asked  to  perform  a simple  clieck  to  see  if  the  values 
calculated  and  stored  by  the  program  fall  within  acceptable  limits  Again  for 
more  details  here,  refer  to  the  example.  If  the  ratios  do  not  agree,  tnen 

temperature  processing  cannot  be  done  correctly.  In  this  case,  tlie  operator 
should  type  1 CR  (one  followed  by  a carriage  return)  on  the  command  console: 
the  program  will  then  stop.  The  operator  may  try  constructing  another  tape, 
in  case  the  first  had  errors,  or  he  may  start  tlie  program  again  and  run 
without  temperature  processing. 

If  the  ratios  are  okay  the  operator  should  enter  a CR.  Tlie  program  will 
list  out  on  the  line  printer  all  ratios  read  in  and  the  coefficients  cal- 
culated by  the  program.  The  line  printer  then  goes  to  the  top  of  the  next 
page,  prints  a page  heading  (again  with  the  flight  infornat ion) , prints  a 
line  heading,  the  program  is  now  ready  for  the  start  of  the  flight.  Tlie 
program  will  now  write  this  message  to  the  conmiand  console: 

PRESS  CR  TO  START  DISPLAY 

From  this  point  in  the  program,  up  to  where  the  'end  of  flight'  signal 
is  entered  by  the  operator,  the  operating  procedure  is  the  very  same  as  for 
the  real  time  balloon,  or  rocket  without  temperature  processing  (described 
in  the  two  previous  sections).  There  are  a few  exceptions  in  the  program  cycle 
itself  though.  As  the  program  does  for  a rocket  without  temperature 
processing,  so  here  winds  are  corrected,  and  data  is  now  printed  out  for  each 
1-EM  layer  in  the  descent  of  the  rocketsonde.  Also  here,  as  met  values  are 
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being  reaJ,  filtered,  and  stored,  some  special  processing  will  be  done.  First, 
it  is  determined  whether  a met  value  is  a temperature  or  a reference.  All  temp-  j 

erature  values  are  run  througli  a selective  filter  to  detect  significant  level 
temperatures;  for  each  one  detected  an  actual  uncorrected  temperature,  in  degrees, 
will  be  computed  by  making  use  of  the  calibration  values  read  in  at  the  start 
of  the  program.  All  reference  values,  and  their  corresponding  time,  are  saved, 
and  all  significant  level  temperatures,  and  their  times,  are  saved.  If  the 
operator  desires,  these  values  may  also  be  listed,  by  assigning  some  list 
device  to  logical  unit  8. 

When  the  operator  enters  the  'DTA  8'  to  signal  the  end  of  the  flight, 
the  program  will  continue  reading  and  processing  new  data  long  enough  for  .;he 
data  buffer  to  fill  up.  All  interrupts  will  then  be  disabled,  and  no  new  data  i 

can  be  processed.  The  line  printer  will  now  move  to  the  top  of  a new  page, 
print  a page  heading,  and  then  list  out  all  stored  temperature  references  and 
all  significant  level  temperatures  detected  during  the  flight.  The  line 
printer  will  again  move  to  a new  page,  print  a page  heading;  and  then  the 
program  will  write  ttiis  message  to  the  command  console: 

DAY  OR  NIGHT  FLIGHT?  Day  - Press  CR;  NIGHT  - 1 CR 

The  operator  should  enter  the  appropriate  answer;  this  determines  which 
..lines  will  be  used  in  correcting  temperatures  for  incoming  radiation.  The 
program  computes  a temperature  for  each  1-KM  layer  in  the  wind  array  (if 
between  20  and  70  KM)  by  interpolating  into  the  significant  level  temperature 
array.  The  temperatures  are  then  corrected  using  the  U.S.  standard  correction 
technique. 

The  program  will  then  write  this  message  to  the  command  console: 

IS  BASE  LEVEL  DATA  AVAIL/\BLE? 

YES  - PRESS  CR;  NO  1 CR 
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To  be  able  to  compute  pressure  and  densities,  the  program  must  obtain  a 


suitable  base  level  match-up  trom  a conjunctive  rawinsonde  observation.  Two 
criteria  determine  whether  or  not  some  particular  base  level  data  is  suitable. 
First,  it  must  be  at  an  altitude  reached  during  the  descent  of  the  rocketsonde 
while  it  was  transmitting  met  data.  Second,  the  base  level  temperature  must 
be  within  2.5  degrees  of  the  temperature  measured  by  the  rocketsonde  at  that 
altitude.  If  no  base  level  data  is  available,  the  operator  should  enter  a 
1 CR;  the  program  then  will  fill  in  dummy  values  for  all  pressures  and  densities 
in  the  1-KM  level  thermodynamic  array.  If  data  is  available,  and  the  operator 
wants  to  try  it  as  a possible  matcluip,  ho  sliould  enter  a CR.  Tlie  program  will 
then  write  this  message  to  the  command  console: 

TYPE  IN  BASE  LEVEL  DATA  (INCLUDE  DEC1M/\L  POINT) 

'ALT  (KM)'  PRSS  (MB)'  Tl^lP  (DEG  - O' 

The  operator  should  then  type  in  tlie  data,  under  the  corresponding  headings 
and  between  the  quote  marks.  If  the  data  does  not  pass  the  two  criteria  the 
program  will  write  a message  to  the  command  console  explaining  wliich  of  the 
two  failed.  Then  this  message  is  written  to  tlie  command  console: 

TRY  ANOTHER  BASE  LEVEL?  YES  - PRESS  CR;  NO  - 1 CR 

If  the  operator  desires  to  try  different  data  for  a possible  match-up, 
he  should  enter  a CR.  The  program  will  then  write  the  above  message  (asking 
the  operator  to  type  in  base  level  data),  and  the  cycle  is  repeated.  The 
operator  may  continue  trying  to  achieve  an  acceptable  match-up,  until  either 
one  is  achieved  or  the  operator  decides  to  stop  trying  for  the  match-up.  If 
the  operator  does  decide  to  stop,  a 1 CR  should  be  entered  in  response  to  the 
quest  ion: 

TRY  ANOTHER  BASE  LEVEL?  YES  - PRESS  CR:  NO  - ICR 

The  program  will  then  fill  in  dummy  values  for  all  the  pressures  and 


densities  in  tlie  1-KM  level  tliermodynamic  array. 

T t‘  an  acceptable  base  level  match-up  is  entered  by  the  operator,  the 
program  will  compute  a pressure  for  each  1-Kfl  level  using  the  hydrostatic- 
equation.  Density  and  speed  of  sound  are  also  computed  for  each  level. 

fne  program  will  now  print  the  base  level  information  on  the  line  printer, 
and  then  the  entire  l-KM  level  array  is  printed  out.  The  print  out  will 
include  altitude,  time,  corrected  wind  data,  corrected  temperature  data,  and 
pressure  and  density  (with  dummy  values  if  no  base  level  is  found). 

The  line  printer  will  now  go  to  the  top  of  a new  page,  print  a page  heading, 
and  then  the  program  will  print  out  thermodynamic  data  for  all  significant 
levels.  The  data  print  out  is  the  same  form  as  described  above  for  the  1-KM 
level  thermodynamic  array.  The  data  is  calculated  by  direct  interpolation  into 
the  1-KM  level  array.  A significant  level  is  created  at  each  time  in  the  flight 
where  a significant  temperature  was  detected. 

The  line  printer  will  again  go  to  the  top  of  a new  page  and  print  a page 
heading.  The  program  will  now  print  out  data  in  the  special  MRN  format  - 
the  MRN  30  cards.  Each  line  consists  of  one  level  of  thermodynamic  data. 

The  10  cards  include  all  1-KM  levels  and  all  significant  levels.  The 
levels  are  arranged  by  altitude,  with  each  significant  level  between 
the  two  l-KM  levels  above  and  below  it. 

The  program  will  now  print  out  thermodynamic  data  for  all  mandatory 
levels  ( on  a new  page  with  a page  heading).  A mandatory  (or  constant  pressure) 
level  is  one  where  the  pressure,  in  millibars,  is  equal  to  any  powers  of  10 
times  7,  5,  ),  2,  or  1.  This  data  is  also  calculated  by  direct  interpolation 
into  the  1-KM  level  array.  The  data  is  next  printed  on  a new  page  in  the 
MRN  format.  I'hene  are  the  MRN  iO  caids,  each  line  of  data  consists  of  one 
mandatory  level  of  thermodynamic  data. 


17 


The  line  printer  will  again  go  to  tlie  top  of  a new  page  and  print  a page 


heading.  Tlie  program  will  now  print  out  a graph  of  the  X and  V component  winds 
and  temperature,  versus  altitude.  The  vertical  axis  is  altitude  in  kilometers, 
above  sea  level.  Three  parameters  are  plotted  along  the  horizontal  axis  - X, 

Y,  and  T.  The  X's  represent  the  corrected  component  wind  in  the  X - direction, 
in  meters  per  second.  The  Y's  represent  the  corrected  component  wind  in  the  Y - 
direction,  in  meters  per  second.  The  T's  stand  for  the  corrected  temperature, 
in  degrees  centigrade.  Any  O's  means  tliat  two,  or  all  tliree,  parameters  occupy 
the  same  point  on  the  graph. 

The  program  will  now  print  a page  heading  at  the  top  of  a new  page. 

The  ROCOB  message  will  now  be  printed  on  tlie  line  printer.  Tlie  ROCOB  message 
consists  basically  of  thermodynamic  data  for  all  levels  with  altitudes  that 
are  multiples  of  5KM.  Also  included  are  all  levels  where  one  of  three 
parameters  - wind  speed,  wind  direction,  or  temperatute  - deviate  from  a straight 
line  approximation  by  more  than  a specified  amount.  The  print-out  gives  the 
altitude  of  each  level  of  data  and  the  value  of  all  three  parameters.  An 
X will  appear  in  the  appropriate  column  to  indicate  which  of  tlie  three  parameters 
caused  that  level  to  be  selected.  The  numbers  at  the  far  right  of  the 
print-out  are  tlie  data  in  the  special  ROCOB  format. 

A last  write  is  now  issued  to  the  mag  tape.  This  record  will  contain  the 
base  level  values  if  a match-up  was  achieved.  .Also  on  this  record  will  be 
fl.igs  to  indic.ite  whether  base  level  data  is  there  or  not.  If  the  flags  are 
set,  and  the  flight  is  run  at  a later  time  in  the  cal  with  tape  mode,  the 
program  will  know  to  use  the  base  level  values  already  there. 

Program  execution  now  ends  and  control  is  returned  to  the  operating  system. 
The  oper.itor  should  issue  a 'write  filemark'  command  to  the  mag  t.ipe.  This 
will  .illow  for  keeping  this  flight  separate  from  the  next  one  recorded  on  the 
tape . 
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B.  I’KINV  l Ol’Y  MOM. 

riiL'  piu>;r;ini  i.s  pljoed  in  tlio  oopy  nioiic*  by  a 1 CK  (a  one  followed  by  a 
earri.ige  return)  in  response  to  the  initial  question  from  the  program.  The 

progr.in  will  return  this  message  to  the  comm.ind  console: 

I'ALSi:  10 

TASK  I’AfSKll 

The  program  is  paused  to  allow  the  operator  to  position  a mag  tape  to  the 
t light  tpreviously  recorded)  which  is  to  be  copied.  After  positioning  the  tape, 
the  operator  should  enter  a 'continue'  command  on  the  console. 

The  program  will  now  read  the  first  record  of  the  mag  tape  and  print  a 
page  heading  with  flight  information  on  the  line  printer.  Flight  launch  time 
and  radar  lock  time  are  .ilso  printed  out. 

Following  this,  the  program  will  read  the  mag  tape  and  create  a print- 
out of  data.  The  print-out  will  include  filtered  and  caKulated  v.-ind  and  positional 
data.  This  d.ita  was  saved  during  the  real  time  run,  and  this  mode  merely  copies 
the  data  from  the  mag  tape. 

The  program  will  continue  reading  data  from  the  tape  until  an  'end  of 
file'  mark  is  encountered,  at  which  time  this  message  will  be  written  to  the 
command  console; 

DONE.’  YES  CR.  NO  1 CR 

If  the  operator  desires  to  end  the  program  here,  a CR  should  be  entered 
and  program  execution  is  returned  to  the  operating  system.  If  it  is  desired 
to  run  the  same  flight  again  or  another  flight  in  the  copy  mode,  a 1 CR 
should  be  entered  by  the  operator.  The  program  will  then  return  this  message 
to  the  command  console: 

PAUSE  10 

TASK  PAUSED. 

Operation  is  exactly  the  same  as  described  above  for  the  first  copv. 
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C.  CAL  WITH  MAC  TAPE  MODE 


The  program  is  placed  In  the  cal  with  tape  mode  by  a 2 CR  (a  two 
followed  by  a carriage  return)  in  response  to  the  initial  question  from  the 
program.  The  program  will  return  this  message  to  the  command  console: 

PAUSE  10 

TASK  PAUSED 

The  program  is  paused  to  allow  the  operator  to  position  a mag  tape  to 
the  flight  (previously  recorded)  which  is  to  be  processed.  After  positioning 
the  tape,  the  operator  should  enter  a 'continue'  command  on  the  console. 

The  program  will  now  read  the  first  record  of  the  mag  tape  and  print  a 
page  heading  with  flight  information  on  the  line  printer.  Also  determined  in 
this  first  tape  read  is  whether  the  flight  was  a balloon  or  a rocket. 

1.  Balloon  - cal  with  tape  mode 

For  a balloon  flight  the  program  will  read  the  mag  tape  and  create  a 
print-out  of  data.  First  the  flight  launch  time  and  the  radar  lock  time  are 
printed  on  the  line  printer.  The  program  then  reads  raw  data  values  from 
the  mag  tape,  and  filters  the  data  and  computes  the  winds.  At  every  multiple 
of  60  seconds  after  balloon  lift-off  the  wind  and  positional  data  are  printed 
on  the  line  printer.  The  program  continues  to  read  the  tape  until  an  'end  of 
file'  mark  is  encountered.  The  program  will  stop  and  control  is  returned 
to  the  operating  system.  .See  pages  21  and  22  for  actual  wind  listings. 

2.  Rocket-cal  with  tape  mode 

On  page  23  is  a sample  print  out  on  the  TTY  and  the  response 
by  the  operator  for  a rocket  flight.  Also  included  on  pages  24  thru  33  is  the 
corresponding  output  produced  by  the  computer.  Note  each  time  the  character  < 
occurs  the  operator  must  supply  the  appropriate  responses. 
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*ST 

REAL  TIME  CR  PRINT  COPY  ICR  CAL  WITH  MAG  TAPE  2CR 

>2 

PAUSE  10 
TASK  PAUSED 
*CO 

CAL  DATA  NOT  ON  MAG  TAPE 

CAL  TAPE  AVAILABLE?  YES  PRESS  CR  , NO  ICR 

> 

PUT  LOKI  TEMP  TAPE  IN  READER  PRESS  CR 

> 

* 0.3000  -46.4958  (Temp  from  chart  -46.34) 

* 0.5000  -29.1980  (Temp  from  chart  -29.27) 

* 0.7000  -11.8978  (Temp  from  chart  -11.92) 

CAL  RATIOS  WITHIN  .3  DEG?  PRESS  CR,NO  PRESS  ICR 

> 


DAY  OR  NIGHT  FLIGHT?  DAY-PRESS  CR;  NIGHT-  ICR 

>1 

BASE  LEVEL  DATA  IS  NOT  ON  MAG  TAPE 
IS  BASE  LEVEL  DATA  AVAILABLE? 

YES-  PRESS  CR;  NO-  ICR 

> 

TYPE  IN  BASE  LEVEL  DATA  (INCLUDE  DECIMAL  POINT) 
'ALT  (KM) 'PRSS(MB) 'TEMP(DEG-C) ' 

> 28.  16.8  -50.0 

STOP 

END  OF  TASK  0 

* 
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D.  LOKI  CALIBRATION  TAPE  PREPARATION 


On  page  35  is  a listing  of  the  1st  page  of  the  calibration 
data  for  the  LOKI  flight  just  processed.  The  date,  that  must  be 
punched  on  paper  tape  is  contained  in  column  2 and  the  last  row  as 
indicated  by  the  dashed  lines.  The  tape  is  punched  by  typing  on  the 
teletype  as  follows : (Note  the  1st  is  typed  by  the  computer,  the 
2nd  is  typed  by  the  operator) 

*BU  PTRP: 

**  0.9911 
**  0.9571 
etc 

**0.1472 
**0.1333 
**  1199.000 
**  430.000 
**  96.160 
**  26.920 
**  6.110 
*$EXIT 
*ENDB 

The  tape  just  prepared  is  then  used  when  the  program  requests — 
"PUT  LOKI  TEMP  TAPE  IN  READER  PRESS  CR" 
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III.  ACCURACY  COMPARISONS 

The  accuracy  of  the  Interdata  7-32 — N.lko  Hercules  systeni(labeled 
AUASS(7-32))  was  estimated  by  comparing  the  rocketsonde  corrected  winds 
from  this  system  to  the  corrected  winds  from  the  UNiVAC  1108— FPS-ib 
system.  The  results  of  this  comparison  are  shown  on  page  37.  Clearly 
the  results  are  in  good  agreement,  as  the  shape  of  the  profile  for 
both  systems  Is  very  similar.  Absolute  differences  are  within  2 to 
4 M/S  at  high  altitudes  and  1/2  to  1 M/S  at  lower  altitudes. 

The  accuracy  of  the  temperature  processing  is  achieved  by  comparing 
the  plot  of  the  actual  raw  temperature  data  to  the  significant  level 
temperature'  d.ita  obtained  by  the  computer.  This  comparison  is  sliowit  on 
page  38  for  a tempe.ature  tolerance  of  2 degrees  C.  The  temperature 
tolerance  guarantees  tluit  the  segmented  curve  will  never  be  more  than 
2 degrees  from  tlie  actual  temperature  curve.  The  data  selected  by  the 
computer  does  agree  very  well  to  tlie  peaks  and  valleys  of  the  raw  temp- 
erature profile. 
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WI.’.T)  SPEED  M/SEC 


TEMPERATURE  COMPARISON 


SECONDS  AFTER  LAUNCH 


IV.  FLOWCHARTS 


The  following  section  contains  flowcharts  for  tlie  entire  program. 
Included  in  this  section  are  a general  flowchart  of  the  program,  a 
flowchart  depicting  the  use  of  the  subroutines  during  program  execution, 
and  detailed  flowcharts  of  each  of  the  subroutines.  The  flowcharts 
have  been  arranged  in  this  manner  in  the  hope  of  presenting  a clearer 
view  of  the  role  of  each  subroutine  in  the  overall  operation  of  the  program. 

Due  to  the  many  pages  of  charts,  a method  had  to  be  implemented  to 
keep  transfers  from  one  page  to  another  separate  and  easy  to  follow.  A 
transfer  from  one  point  in  a chart  to  another  (which  may  or  may  not 
be  on  the  same  page)  is  identified  by  the  execution  flow  entering  a circle 
with  a letter  and  a number  inside.  The  number  corresponds  to  a number 
at  top  of  some  page  (immediately  following  the  page  title),  and  the  letter 
matches  to  a circle  on  that  page  with  the  same  letter  in  it. 
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GENERAL  FLOWCHART  FOR  PROGRAM  -1.2 


READ  RAW 
, DATA  FROM 
MAG  TAPE 


PRINT  OUT  LIST  OF 
ALL  SIGNIFICANT 
LE\'ELS 


INTERPOLATE  THERMO- 
DYNAMIC DATA  FOR 
MANDATORY  LEVELS 


END  OF' 
FILE?  / 


INTERPOLATE  1-KM 
TEMPERATURE  DATA 
PROM  SIGNIFICANT 
LEVEL  DATA 


PRINT  OLT  MAN- 
DATORY LEVEL 
CORRECTED  TEMP- 
ERATURE DATA 


• *■ 

FILTER  DATA, 

PRINT  OUT  1-KM 

COMPUTE  AND 

LEVEL  CORRECTED 

CORRECT  WINDS 

— V — 

TEMPERATURE  DATA 

f y 

DETECT  AND  STORE 
SIGNIFICANT  LEVEL 
LEVEL  TEMPERATURES 

— 

INTERPOLATE  THERMO- 
DYNAMIC DATA  FOR 
SIGNIFICANT  LEVELS 

as  ALTITUDE  AT  ' 
.AN  EVTN  KILOMETER! 


PRINT  OUT  THE 
1-KM  LEVEL  WIND 
AND  POSITIONAL 
DATA 


PRINT  OUT  SIGNIFICANT 
LEVEL  CORRECTED  TEMP- 
PERATURE  DATA 


PRINT  OUT  MRN 
FORMATLED  30-CARDS 
DATA 


PRINT  Oirr  MRN 
FORMATLED  i.O-CARDS 
DATA 


COMPUTE  AND 
PRINT  OUT  THE 
ROCOB  MESSAGE 


'is  THERE 
BASE  LEVEL 

Vmatchup?/ 


WRITE  LAST 
, MAG  TAPE 
RECORD  WITH 
BASE  LEVEL 
VALUES  1 
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I'SE  OF  SUBROUTINES  BY  EROCR/VM  -2.1 


/ ONLY  FOR  . 

' ROCKET  FLIGHTS  \ 
WITH  temperature] 
: PROCESSING  I 


FILTER  1U\W 
DATA;  COMPUTE 
AND  CORRECT 
WINDS 


DETECT  AND  STORE 
SIGNIFICANT  LEVEL 
TEMPER^YTURES 


RECEIVE  A R.\T10  AND 
RETURN  ACTUAL  TEMPFR/YTURE 


END  OF 
FLIGHT 


PLOTS  X .YND  Y 
COORDINATE  WINDS 
■YND  TEMPERATURE 
Y'ERSUS  ALTITUDE 


COMPUTES  AND  PRINTS 
ROCOB  MESSAGE 


^ IVNDLE  S.\lA 
( MAC  lAPE  ) 
\DATA  y 


FLOWCH-\RT  FOR  MMN  PROGRAM  - 3.5 


PROCESS> 
NEW  RAW 
DATA  J 


RDTAPEN 
. 3.5  ) 


SAVE  AH. 
L’SER  REGISTERS 


/ IS 
RE.VL  TIME' 

\ flight/ 


/ IS  \ 
/ DISPLAY  \ 
vENCODE  FL\lp 
\ SET?  / 


/ H.\VE  \ 

^ new  R.AW  \ 
UNPROCESSED^ 
\ DATA?  / 


/ IS  \ 
/ MAC  TAPE  ' 
yWRITE  FLAG/ 
\ SET?  / 


WRITE  COMPLETE 

, buffer  on 

I MAC  TAPE 


ENCODE  CURRENT 
RAW  DATA  IN  TV 
DISPLAY  BUFFER 


ENABLE  FOR 
INTERRUPT 
FROM  TV 
DISPLAY 


WAIT  IN  COUNT 
LOOP  TO  ALLOW 
INTERRUPT  FROM 
RANCER  TO  BRINC 
IN  NEW  RAW  DATA 


/ IS  \ 
.COUNT  LOOM 
\ DONE?  / 


re-initialize 

INTERRUPTS  AND 
MAC  TAPE  BUFFER 
l.YPFXES 


T.AKE  RAW  DATA 
FROM  BUFFER  FOR 
fCUA'CE,  AZIMITH, 
AND  ELEVATION 
AND  CONVERT  TO 
SPECIAL  INTEGER 
' FORM  TO  BE  USED 
BY  DIGIT-AL  FILTER 


USE  THREE  STORED 
WORDS  OF  TI.ME  TO 
CONVERT  TO  TIME. 
IN  SECONDS.  AFTER 
LAUNCH 


UPDATE  E.XTERNAL 
MAC  TAPE  BUFFER 
POINTER  (MINDX) 


IF  VALUES  FOR 
AZIMUTH  OR 
ELEVATION  ABE 
OUTSIDE  OF  0-3oO 
DEGREE  LIMITS, 
CORRECT  VALUE  TO 
THIS  RANC.E 


/ IS  \ 
REAL  TIME' 
\ FLIGHT  / 
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I FLO',>’CHv\RT  FOR  MMN  PSOCRAM  - T.lg 
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FLOWClWRT  FOR  Sl'BROFTINE  R'NCAL  - '..I 


^START^ 


,4.1 


routine  is  an  ARRAY 

(IN  COMMON /BUFUTA/) 
OF  RAM  DATA:  121 

POINTS  OF  EACH  OF 
TIME,  RANGE,  ELEVA- 
TION, AND  ,\2IMUTH; 
0 . 1 SECOND  SAMPLES 


RUN  DATA  THROUGH 
A U7-POINT  FILTER 
TO  GET  5 SMOOTHED 
POINTS  FOR  EACH  OF 
TIME,  RANGE,  ELEVA- 
TION.  AND  A7.IMl,"ril 


initialize  all 

COMPUTATIONAL 

PAR.LMETERS 

i 

STORE  INITIAL 
VALUES  IN 
ARRAY  FOR 
COPY  MODE 

1 

r .j 

PRINT 

LINE 

co^ 

n/ 

first 

OF  THE 

tPOTED 

^TA 

t— — 

COMPUTE:  ELEVATION 
lYND  AZIMUTH  IN  DEGREES, 
TIME  IN  SECONDS  SINCE 
LAUNCH,  ALTITUDE  (MSL) , 
CORRECTED  HDO,  AND 
COORDINATE  POSITIONS 
OF  TARGET 


ROCKET 

P * 

COMPUTE  UNCOVJIECTED 

X,Y,  AND  Z VELOCITIES 
FROM  POSTIONAI.  DATA 

r 

© 


COMPUTE  THE 
ACCELERATIONS 
FOR  X,Y,  and  Z 
DIRECTIONS 


1 — 

' 

[ RUN  X,1 

t,  AND  Z 

accelerations 

THROUGH  A 1(8- 

POINT  FILTER  TO 

SMOOTH 

VALLES  1 
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FLOWCHART  FOR  Sl'BROrTINE  WNDC/U,  - 4.3 
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FIOWCIUKT  FOR  SUBROUTINE  SICLEV-5.1 


FIRST  CALL 


ROUTINE  IS  SENT  A 
TEM1>ER.\TURE  VALUE 
AND  A TIME  IN 
REGISTERS  0 AND  7 


'VHAT  TYFIN 
\OF  CALL?/ 


last  call 


SET  ALL  THE 
SIGNIFICAN  LEVEL 
TIMES  EQUAL- I 


SET  INITIAL 
SLOPES  TO 
BE  VERTICLE 


NORMAL  CALL 


IS  VALUE  A'' 
^REFERENCE  ^ 


IS  FIRST  VALUE' 
S.  A REFERENCE?  / 


CALCULATE 
SLOPES  WITH 
NEW  VALUE 


as  NEW  SL0PE\ 
BETWEEN  OUTEiy 
\.  SLOPES?  / 


STORE  L/\ST  TIME 
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PRINT  OUT  THE 
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OF  EACH  REFERENCE 


SAVE  AS 
NEW  INNER 
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CALCLLATE  THE 
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FOR  THIS  LEVEL 

COMPUTE  PRESSURE 
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^RETURN^ 


COMPUTE  PRESSURES 
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ALTITUDES  BELOW 
BASE  LEVEL 
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is  to  provide  a system  to  automatically  collect  met  data,  process  this 
data  and  provide  users  with  appropriate  meteorological  outputs. 

Since  the  Interdata  model  70  computer  is  limited  to  its  present 
memory  capacity  of  ()4K  bytes,  only  computer  programs  that  are  smaller 
than  about  50K  bytes  can  bo  executed(KTOS  operating  system  uses  about 
16K  bytes).  This  memory  limitation  places  rather  serious  restrictions 
on  the  type  and  number  of  programs  tliat  can  be  run.  For  example 
the  computer  program  at  the  beginning  of  tills  report  utilizes  92K  bytes 
of  memory. 

With  the  above  as  background,  the  following  items  were  considered 
in  recommending  a replacement  for  the  model  70  computer, 

1 - Compatibility  with  existing  hardware 

2 - Computing  capacity  memory  size  and  computing  speed 

3 - Man  hours  of  time  to  learn  new  system  procedures 

4 - Cost 

When  all  four  items  are  considered  togetlier,  there  is  only  one 
logical  choice.  This  choice  would  be  the  Interdata  7/32  computer.  If 
the  cost  factor  was  not  present  then  the  computing  speed  could  be  enhanced 
by  selecting  the  8/32  computer. 

The  responses  to  the  above  areas  are  as  follows: 

1 - Compatibility  with  existing  hardware — Since  Interdata  utilizes 
the  same  type  of  controls  for  both  the  model  70  and  7/32  systems, 
both  the  controller  and  I/O  devices  can  be  utilized  directly 
by  the  7/32  computer.  Therefore  there  Is  a 100%  compatibility 


with  existing  hardware. 


2 - Computing  capacity  - memory  size  and  computing  speed.  The 


Int^rdata  7/32  can  be  expanded  to  1 million  bytes  of  memory. 

Computing  speed  Is  1 to  j microseconds  for  most  operations.  A 
high  performance  floating  point  unit  Is  available  which  will 
provide  double  precision  speeds  of  5 to  10  microseconds. 

3 - The  MT(multltasklng)  operating  system  available  for  the  7/32 

Is  structured  In  a manner  which  Is  very  similar  to  the  RTOS 
system  of  the  model  70.  It  Is  estimated  that  a period  of  2 
to  3 weeks  would  be  required  to  be  able  to  use  the  new  system 
for  personnel. 

4 - Cost  - The  basic  cost  of  a 7/32  with  a MAC(memory  access  controller), 

128K  bytes  of  memory,  power  supply  and  card  cage  Is  about 
$15,000.  If  an  8/32  were  to  be  purchased,  the  cost  Is  about 
3 times  that  of  a 7/32.  Also  the  present  MT  software  Is  not 
written  to  take  advantage  of  the  special  hardware  capabilities 
that  the  8/32  has. 
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VII.  ALASKA  EFFORT 


From  July  12,  1977,  through  July  24,  1977,  Dr.  Merrill  was  at  the 
Poker  Flat  facility  installing  and  testing  the  programs  developed. 

During  this  period  of  time,  the  personnel  at  Poker  Flat  were  re- 
quired to  launch  a balloon  and  rocket  dally  (for  scale  of  motion  study). 
The  computer  was  operated  utilizing  the  programs  developed.  The  first 
four  flights  were  evaluated  and  checked  for  accuracy.  The  results  of 
this  evaluation  indicated  that  the  program  worked  very  well  and  was 
able  to  get  useful  data  for  some  flights  for  which  manual  reduction 
failed . 

During  the  remainder  of  the  time,  spot  checks  were  made  on  flight 
data  along  with  an  intensive  education  program  for  the  Poker  Flat  per- 
sonnel so  that  they  would  be  able  to  operate  the  computer  with  the  new 
programs 
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This  report  contains  a detailed  description  of  a computer  program  that  was 
developed  for  use  with  the  Interdata  7/32  computer  and  the  interfaced  Nike 
Hercules  radar  systems  located  at  the  MTTR  site  at  White  Sands,  New  Mexico 
and  the  Poker  Flat  site  in  Alaska. ^ 

The  program  contains  both  assembler  and  FORTRAN  language  instructions. 

The  assembler  language  instructions  are  used  to  provide  input/output 
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20.  ABSTRACT  (Cont) 

to  the  T.  V.  display.  The  FORTRAN  statements  comprise  95%  of  the  program 
and  are  used  to  compute  most  of  the  processed  data. 

The  program  can  process  in  real-time  a complete  data  reduction  for  an  MRN 
rocketsonde  or  a list  of  2 minute  layer  winds  for  a radiosonde.  For  a rocket- 
sonde,  the  program  utilizes  the  temperature  telemetry  data,  the  positional 
radar  data,  and  the  operator  inputs  of  rocketsonde  temperature  calibration 
values  and  base  level  tie-in  data  from  a radiosonde  flight  to  produce  an 
MRN(WDC-A)  format  listing  of  the  following: 

XfK  1 KM  corrected  and  uncorrected  winds/ 

Significant  level  temperature  data 

< 3.  1 KM  thermodynamic  data 

v4>  Significant  level  thermodynamic  data 

/ 

-TS,  MRN  30  cards(image) ^ 

-A-Sv  Mandatory  thermodynamic  data; 

^-7.  MRN  40  cards  (image)/ 

8.  Printer  plot  of  X and  Y component  winds  and 
temperatures  versus  1 KM  altitudes 

For  a radiosonde,  the  program  utilizes  the  positional  radar  data  to  produce  a 
listing  of  two-minute  layer  winds  at  1 minute  intervals. 


This  report  includes  a description,  listing  and  flow  charts  for  the  main  program 
and  all  subroutines,  together  with  instructions  and  examples  on  how  to  use  the 
program.  Also  included  is  the  typical  output  listing  for  both  the  radiosonde 
and  rocketsonde  flights. 
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